MacFormat 1999 April/macformat-075.iso/Shareware Plus/Utilities/Geo3D 1.1.8/Sample Scripts/Animation

Text File | 1998-12-17 | 237 b | 12 lines | [TEXT/ToyS]

tell application "Geo3D"
    activate
    make new document
    set x to import animation from file ":Sample Scripts:Demo.geo"
    if x > 0 then -- 0: error
        play
        repeat with x from 1 to x -- slower
            go to frame x
        end repeat
    end if
end tell